package com.platform.utils.excel;

import java.io.BufferedWriter;
import java.io.File;
import java.io.FileInputStream;
import java.io.FileNotFoundException;
import java.io.FileOutputStream;
import java.io.IOException;
import java.io.InputStream;
import java.io.OutputStream;
import java.io.OutputStreamWriter;
import java.io.UnsupportedEncodingException;
import java.math.BigDecimal;
import java.net.URLDecoder;
import java.text.DecimalFormat;
import java.text.SimpleDateFormat;
import java.util.Date;
import java.util.HashMap;
import java.util.Map;
import org.apache.poi.hssf.usermodel.HSSFCellStyle;
import org.apache.poi.hssf.usermodel.HSSFDataFormat;
import org.apache.poi.hssf.usermodel.HSSFDateUtil;
import org.apache.poi.hssf.usermodel.HSSFFont;
import org.apache.poi.hssf.usermodel.HSSFFormulaEvaluator;
import org.apache.poi.hssf.usermodel.HSSFPalette;
import org.apache.poi.hssf.usermodel.HSSFWorkbook;
import org.apache.poi.hssf.util.HSSFColor;
import org.apache.poi.ss.usermodel.Cell;
import org.apache.poi.ss.usermodel.CellStyle;
import org.apache.poi.ss.usermodel.FormulaEvaluator;
import org.apache.poi.ss.usermodel.Row;
import org.apache.poi.ss.usermodel.Sheet;
import org.apache.poi.ss.usermodel.Workbook;
import org.apache.poi.ss.usermodel.WorkbookFactory;
import org.apache.poi.ss.util.CellRangeAddress;
import org.apache.poi.xssf.usermodel.XSSFCellStyle;
import org.apache.poi.xssf.usermodel.XSSFColor;
import org.apache.poi.xssf.usermodel.XSSFFont;
import org.apache.poi.xssf.usermodel.XSSFFormulaEvaluator;
import org.apache.poi.xssf.usermodel.XSSFWorkbook;

/**
 * 解析excel成html
 *
 * @author lipengjun
 * @email 939961241@qq.com
 * @date 2017年10月28日 13:11:27
 */
public class Excel2Html {

  public static void main(String[] args) throws UnsupportedEncodingException {
//		str = excelToHtml(realPath, "1.html");
    String path = Excel2Html.class.getResource(".").getPath();

    String realPath = URLDecoder.decode(path, "utf-8");

    String str = excelToHtml(realPath + "\\acctExport.xlsx");
    System.out.println(str);
  }

  public static String excelToHtml(String realPath) {
    String excelFile = realPath;
    //String htmlFile=realPath + "\\" + saveName + ".html";
    InputStream is = null;
    String content = null;
    File sourcefile = null;
    try {
      sourcefile = new File(excelFile);
      is = new FileInputStream(sourcefile);
      //此WorkbookFactory在POI-3.10版本中使用需要添加dom4j
      Workbook wb = WorkbookFactory.create(is);
      if (wb instanceof XSSFWorkbook) {
        XSSFWorkbook xWb = (XSSFWorkbook) wb;
        eval = new XSSFFormulaEvaluator((XSSFWorkbook) wb);
        content = getExcelInfo(xWb, true);
      } else if (wb instanceof HSSFWorkbook) {
        HSSFWorkbook hWb = (HSSFWorkbook) wb;
        eval = new HSSFFormulaEvaluator((HSSFWorkbook) wb);
        content = getExcelInfo(hWb, true);
      }
      //writeFile(content, htmlFile);
    } catch (Exception e) {
      e.printStackTrace();
    } finally {
      try {
        is.close();
        if (sourcefile.exists()) {
          //sourcefile.delete();
        }
      } catch (IOException e) {
        e.printStackTrace();
      }
    }
    return content;
  }

  private static FormulaEvaluator eval = null;

  public static String getExcelInfo(Workbook wb, boolean isWithStyle) {
    StringBuffer sb = new StringBuffer();
    Sheet sheet = wb.getSheetAt(0);//获取第一个Sheet的内容
    int lastRowNum = sheet.getLastRowNum();
    Map<String, String> map[] = getRowSpanColSpanMap(sheet);
    sb.append("<table style='border-collapse:collapse;' id='gv' width='100%'>");
    Row row = null;        //兼容
    Cell cell = null;    //兼容

    for (int rowNum = sheet.getFirstRowNum(); rowNum <= lastRowNum; rowNum++) {
      row = sheet.getRow(rowNum);
      if (row == null) {
        sb.append("<tr><td >  </td></tr>");
        continue;
      }
      sb.append("<tr>");
      int lastColNum = row.getLastCellNum();
      for (int colNum = 0; colNum < lastColNum; colNum++) {
        cell = row.getCell(colNum);
        if (cell == null) {    //特殊情况 空白的单元格会返回null
          sb.append("<td> </td>");
          continue;
        }

        String stringValue = getCellValueFormula(cell, eval);
        if (map[0].containsKey(rowNum + "," + colNum)) {
          String pointString = map[0].get(rowNum + "," + colNum);
          map[0].remove(rowNum + "," + colNum);
          int bottomeRow = Integer.valueOf(pointString.split(",")[0]);
          int bottomeCol = Integer.valueOf(pointString.split(",")[1]);
          int rowSpan = bottomeRow - rowNum + 1;
          int colSpan = bottomeCol - colNum + 1;
          sb.append("<td rowspan= '" + rowSpan + "' colspan= '" + colSpan + "' ");
        } else if (map[1].containsKey(rowNum + "," + colNum)) {
          map[1].remove(rowNum + "," + colNum);
          continue;
        } else {
          sb.append("<td ");
        }

        //判断是否需要样式
        if (isWithStyle) {
          dealExcelStyle(wb, sheet, cell, sb);//处理单元格样式
        }

        sb.append(">");
        if (stringValue == null || "".equals(stringValue.trim())) {
          sb.append("   ");
        } else {
          // 将ascii码为160的空格转换为html下的空格（ ）
          sb.append(stringValue.replace(String.valueOf((char) 160), " "));
        }
        sb.append("</td>");
      }
      sb.append("</tr>");
    }
    sb.append("</table>");
    return sb.toString();
  }

  private static Map<String, String>[] getRowSpanColSpanMap(Sheet sheet) {
    Map<String, String> map0 = new HashMap<String, String>();
    Map<String, String> map1 = new HashMap<String, String>();
    int mergedNum = sheet.getNumMergedRegions();
    CellRangeAddress range = null;
    for (int i = 0; i < mergedNum; i++) {
      range = sheet.getMergedRegion(i);
      int topRow = range.getFirstRow();
      int topCol = range.getFirstColumn();
      int bottomRow = range.getLastRow();
      int bottomCol = range.getLastColumn();
      map0.put(topRow + "," + topCol, bottomRow + "," + bottomCol);
      // System.out.println(topRow + "," + topCol + "," + bottomRow + "," + bottomCol);
      int tempRow = topRow;
      while (tempRow <= bottomRow) {
        int tempCol = topCol;
        while (tempCol <= bottomCol) {
          map1.put(tempRow + "," + tempCol, "");
          tempCol++;
        }
        tempRow++;
      }
      map1.remove(topRow + "," + topCol);
    }
    Map[] map = {map0, map1};
    return map;
  }


  /**
   * 获取表格单元格Cell内容
   */
  private static String getCellValue(Cell cell) {
    String result = new String();
    switch (cell.getCellType()) {
      // 数字类型
      case Cell.CELL_TYPE_NUMERIC:
        // 处理日期格式、时间格式
        if (HSSFDateUtil.isCellDateFormatted(cell)) {
          SimpleDateFormat sdf = null;
          if (cell.getCellStyle().getDataFormat() == HSSFDataFormat.getBuiltinFormat("h:mm")) {
            sdf = new SimpleDateFormat("HH:mm");
          } else {// 日期
            sdf = new SimpleDateFormat("yyyy-MM-dd");
          }
          Date date = cell.getDateCellValue();
          result = sdf.format(date);
        } else if (cell.getCellStyle().getDataFormat() == 58) {
          // 处理自定义日期格式：m月d日(通过判断单元格的格式id解决，id的值是58)
          SimpleDateFormat sdf = new SimpleDateFormat("yyyy-MM-dd");
          double value = cell.getNumericCellValue();
          Date date = org.apache.poi.ss.usermodel.DateUtil
              .getJavaDate(value);
          result = sdf.format(date);
        } else if (cell.getCellStyle().getDataFormat() == 10) {
          // 百分比格式的处理
          cell.setCellType(Cell.CELL_TYPE_STRING);
          String value = cell.getStringCellValue();
          DecimalFormat format = new DecimalFormat("#0.00%");
          result = format.format(Double.parseDouble(value));
        } else if (cell.getCellStyle().getDataFormatString().equals("0.0000%")) {
          // 百分比格式的处理
          cell.setCellType(Cell.CELL_TYPE_STRING);
          String value = cell.getStringCellValue();
          DecimalFormat format = new DecimalFormat("#0.0000%");
          result = format.format(Double.parseDouble(value));
        } else {
          double value = cell.getNumericCellValue();
          CellStyle style = cell.getCellStyle();
          DecimalFormat format = new DecimalFormat(",##0.00########");
          String temp = style.getDataFormatString();
          // 单元格设置成常规
          if (temp.equals("General")) {
            format.applyPattern("#");
          }
          result = format.format(value);
        }
        break;
      // String类型
      case Cell.CELL_TYPE_STRING:
        result = cell.getRichStringCellValue().toString();
        break;
      case Cell.CELL_TYPE_BLANK:
        result = "";
        break;
      default:
        result = "";
        break;
    }
    return result;
  }

  public static String getCellValueFormula(Cell cell, FormulaEvaluator formulaEvaluator) {
    if (cell == null || formulaEvaluator == null) {
      return null;
    }

    if (cell.getCellType() == Cell.CELL_TYPE_FORMULA) {
      DecimalFormat format = new DecimalFormat(",##0.00########");
      double calcResult = formulaEvaluator.evaluate(cell).getNumberValue();

      return format.format(new BigDecimal(calcResult).setScale(2, BigDecimal.ROUND_HALF_UP));
    }
    return getCellValue(cell);
  }

  /**
   * 处理表格样式
   */
  private static void dealExcelStyle(Workbook wb, Sheet sheet, Cell cell, StringBuffer sb) {
    CellStyle cellStyle = cell.getCellStyle();
    if (cellStyle != null) {
      short alignment = cellStyle.getAlignment();
      sb.append("align='" + convertAlignToHtml(alignment) + "' ");//单元格内容的水平对齐方式
      short verticalAlignment = cellStyle.getVerticalAlignment();
      sb.append("valign='" + convertVerticalAlignToHtml(verticalAlignment) + "' ");//单元格中内容的垂直排列方式

      if (wb instanceof XSSFWorkbook) {

        XSSFFont xf = ((XSSFCellStyle) cellStyle).getFont();
        short boldWeight = xf.getBoldweight();
        sb.append("style='");
        sb.append("font-weight:" + boldWeight + ";"); // 字体加粗
        sb.append("font-size: " + xf.getFontHeight() / 2 + "%;"); // 字体大小
        int columnWidth = sheet.getColumnWidth(cell.getColumnIndex());
        sb.append("width:" + columnWidth + "px;");

        XSSFColor xc = xf.getXSSFColor();
        if (xc != null && !"".equals(xc)) {
          sb.append("color:#" + xc.getARGBHex().substring(2) + ";"); // 字体颜色
        }

        XSSFColor bgColor = (XSSFColor) cellStyle.getFillForegroundColorColor();
        if (bgColor != null && !"".equals(bgColor)) {
          sb.append("background-color:#" + bgColor.getARGBHex().substring(2) + ";"); // 背景颜色
        }
        sb.append(getBorderStyle(0, cellStyle.getBorderTop(),
            ((XSSFCellStyle) cellStyle).getTopBorderXSSFColor()));
        sb.append(getBorderStyle(1, cellStyle.getBorderRight(),
            ((XSSFCellStyle) cellStyle).getRightBorderXSSFColor()));
        sb.append(getBorderStyle(2, cellStyle.getBorderBottom(),
            ((XSSFCellStyle) cellStyle).getBottomBorderXSSFColor()));
        sb.append(getBorderStyle(3, cellStyle.getBorderLeft(),
            ((XSSFCellStyle) cellStyle).getLeftBorderXSSFColor()));
      } else if (wb instanceof HSSFWorkbook) {
        HSSFFont hf = ((HSSFCellStyle) cellStyle).getFont(wb);
        short boldWeight = hf.getBoldweight();
        short fontColor = hf.getColor();
        sb.append("style='");
        HSSFPalette palette = ((HSSFWorkbook) wb).getCustomPalette(); // 类HSSFPalette用于求的颜色的国际标准形式
        HSSFColor hc = palette.getColor(fontColor);
        sb.append("font-weight:" + boldWeight + ";"); // 字体加粗
        sb.append("font-size: " + hf.getFontHeight() / 2 + "%;"); // 字体大小
        String fontColorStr = convertToStardColor(hc);
        if (fontColorStr != null && !"".equals(fontColorStr.trim())) {
          sb.append("color:" + fontColorStr + ";"); // 字体颜色
        }
        int columnWidth = sheet.getColumnWidth(cell.getColumnIndex());
        sb.append("width:" + columnWidth + "px;");
        short bgColor = cellStyle.getFillForegroundColor();
        hc = palette.getColor(bgColor);
        String bgColorStr = convertToStardColor(hc);
        if (bgColorStr != null && !"".equals(bgColorStr.trim())) {
          sb.append("background-color:" + bgColorStr + ";"); // 背景颜色
        }
        sb.append(
            getBorderStyle(palette, 0, cellStyle.getBorderTop(), cellStyle.getTopBorderColor()));
        sb.append(getBorderStyle(palette, 1, cellStyle.getBorderRight(),
            cellStyle.getRightBorderColor()));
        sb.append(
            getBorderStyle(palette, 3, cellStyle.getBorderLeft(), cellStyle.getLeftBorderColor()));
        sb.append(getBorderStyle(palette, 2, cellStyle.getBorderBottom(),
            cellStyle.getBottomBorderColor()));
      }
      sb.append("' ");
    }
  }

  /**
   * 单元格内容的水平对齐方式
   */
  private static String convertAlignToHtml(short alignment) {
    String align = "left";
    switch (alignment) {
      case CellStyle.ALIGN_LEFT:
        align = "left";
        break;
      case CellStyle.ALIGN_CENTER:
        align = "center";
        break;
      case CellStyle.ALIGN_RIGHT:
        align = "right";
        break;
      default:
        break;
    }
    return align;
  }

  /**
   * 单元格中内容的垂直排列方式
   */
  private static String convertVerticalAlignToHtml(short verticalAlignment) {
    String valign = "middle";
    switch (verticalAlignment) {
      case CellStyle.VERTICAL_BOTTOM:
        valign = "bottom";
        break;
      case CellStyle.VERTICAL_CENTER:
        valign = "center";
        break;
      case CellStyle.VERTICAL_TOP:
        valign = "top";
        break;
      default:
        break;
    }
    return valign;
  }

  private static String convertToStardColor(HSSFColor hc) {
    StringBuffer sb = new StringBuffer("");
    if (hc != null) {
      if (HSSFColor.AUTOMATIC.index == hc.getIndex()) {
        return null;
      }
      sb.append("#");
      for (int i = 0; i < hc.getTriplet().length; i++) {
        sb.append(fillWithZero(Integer.toHexString(hc.getTriplet()[i])));
      }
    }
    return sb.toString();
  }

  private static String fillWithZero(String str) {
    if (str != null && str.length() < 2) {
      return "0" + str;
    }
    return str;
  }

  static String[] bordesr = {"border-top:", "border-right:", "border-bottom:", "border-left:"};
  static String[] borderStyles = {"solid ", "solid ", "solid ", "solid ", "solid ", "solid ",
      "solid ", "solid ", "solid ", "solid", "solid", "solid", "solid", "solid"};

  private static String getBorderStyle(HSSFPalette palette, int b, short s, short t) {
    if (s == 0) {
      return bordesr[b] + borderStyles[s] + "#d0d7e5 1px;";
    }
    ;
    String borderColorStr = convertToStardColor(palette.getColor(t));
    borderColorStr =
        borderColorStr == null || borderColorStr.length() < 1 ? "#000000" : borderColorStr;
    return bordesr[b] + borderStyles[s] + borderColorStr + " 1px;";
  }

  private static String getBorderStyle(int b, short s, XSSFColor xc) {
    if (s == 0) {
      return bordesr[b] + borderStyles[s] + "#d0d7e5 1px;";
    }
    ;
    if (xc != null && !"".equals(xc)) {
      String borderColorStr = xc.getARGBHex();//t.getARGBHex();
      borderColorStr = borderColorStr == null || borderColorStr.length() < 1 ? "#000000"
          : borderColorStr.substring(2);
      return bordesr[b] + borderStyles[s] + borderColorStr + " 1px;";
    }
    return "";
  }

  private static void writeFile(String content, String path) {
    OutputStream os = null;
    BufferedWriter bw = null;
    try {
      File file = new File(path);
      os = new FileOutputStream(file);
      bw = new BufferedWriter(new OutputStreamWriter(os));
      bw.write(content);
    } catch (FileNotFoundException fnfe) {
      fnfe.printStackTrace();
    } catch (IOException ioe) {
      ioe.printStackTrace();
    } finally {
      try {
        if (bw != null) {
          bw.close();
        }
        if (os != null) {
          os.close();
        }
      } catch (IOException ie) {
        ie.printStackTrace();
      }
    }
  }
}
